object frmProperties: TfrmProperties Left = 296 Top = 201 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsDialog Caption = 'Remote Control CD Player Properties' ClientHeight = 422 ClientWidth = 582 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter ShowHint = True OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PageControl: TPageControl Left = 177 Top = 21 Width = 405 Height = 374 ActivePage = tbsAppearance Align = alClient TabOrder = 1 OnChange = PageControlChange object tbsGeneral: TTabSheet Tag = 1 Caption = '&Behaviour' TabVisible = False object Image4: TImage Left = 8 Top = 8 Width = 48 Height = 48 AutoSize = True Picture.Data = {} Transparent = True end object Label8: TLabel Left = 64 Top = 24 Width = 301 Height = 25 AutoSize = False Caption = 'Use these settings to control the behaviour of the CD player.' WordWrap = True end object optStartup: TRadioGroup Left = 8 Top = 64 Width = 185 Height = 65 HelpContext = 101 Caption = 'On Startup' ItemIndex = 1 Items.Strings = ( 'Start in &tray immediately' 'Sho&w on screen') TabOrder = 0 OnClick = AnyChange end object optOnInsert: TRadioGroup Left = 200 Top = 64 Width = 189 Height = 65 HelpContext = 102 Caption = 'When a CD is inserted' ItemIndex = 1 Items.Strings = ( 'Start &playing immediately' '&Don'#39't play') TabOrder = 1 OnClick = AnyChange end object GroupBox5: TGroupBox Left = 200 Top = 200 Width = 185 Height = 49 HelpContext = 109 Caption = 'Default CD Drive' TabOrder = 4 object cbDriveList: TComboBox Left = 12 Top = 20 Width = 65 Height = 21 HelpContext = 109 Style = csDropDownList ItemHeight = 0 TabOrder = 0 OnChange = AnyChange end end object Database: TGroupBox Left = 8 Top = 260 Width = 185 Height = 69 Caption = 'CD Database' TabOrder = 5 object cbFormatNative: TCheckBox Left = 8 Top = 20 Width = 173 Height = 17 HelpContext = 107 Caption = 'Save in CDPlayer.&INI format' TabOrder = 0 end object cbFormatCDDB: TCheckBox Left = 8 Top = 44 Width = 165 Height = 17 HelpContext = 108 Caption = 'Save in CDDB &format' TabOrder = 1 end end object GroupBox6: TGroupBox Left = 8 Top = 144 Width = 185 Height = 105 Caption = 'Options' TabOrder = 2 object Label16: TLabel Left = 12 Top = 72 Width = 111 Height = 13 Caption = 'Skip amount (seconds):' end object Edit3: TEdit Left = 128 Top = 68 Width = 29 Height = 21 HelpContext = 105 TabStop = False ReadOnly = True TabOrder = 0 Text = '2' end object udSkipAmount: TUpDown Left = 157 Top = 68 Width = 12 Height = 21 HelpContext = 105 Associate = Edit3 Min = 1 Max = 30 Position = 2 TabOrder = 1 Wrap = False OnClick = udChange end object cbStopOnExit: TCheckBox Left = 12 Top = 20 Width = 141 Height = 17 HelpContext = 103 Caption = 'Stop CD playing on e&xit' TabOrder = 2 OnClick = AnyChange end object cbInsertNotify: TCheckBox Left = 12 Top = 44 Width = 153 Height = 17 HelpContext = 104 Caption = '&RCCD is the default player' TabOrder = 3 OnClick = AnyChange end end object GroupBox7: TGroupBox Left = 200 Top = 144 Width = 189 Height = 53 HelpContext = 106 Caption = 'Double-Clicking the title bar:' TabOrder = 3 object cmbDblClickAction: TComboBox Left = 8 Top = 20 Width = 165 Height = 21 HelpContext = 106 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Puts RCCD in the tray' 'Edits CD Play List' 'Opens RCCD Properties' 'Rolls display up/down') TabOrder = 0 OnChange = AnyChange end end end object tbsAppearance: TTabSheet Tag = 2 Caption = 'A&ppearance' TabVisible = False object Image3: TImage Left = 8 Top = 8 Width = 48 Height = 48 AutoSize = True Picture.Data = {} Transparent = True end object Label19: TLabel Left = 64 Top = 24 Width = 301 Height = 25 AutoSize = False Caption = 'Use these settings to control the appearance of the CD player.' WordWrap = True end object GroupBox1: TGroupBox Left = 8 Top = 64 Width = 381 Height = 97 Caption = 'Options' TabOrder = 0 object cbShowToolTips: TCheckBox Left = 224 Top = 20 Width = 97 Height = 17 HelpContext = 204 Caption = 'S&how tool tips' State = cbChecked TabOrder = 3 OnClick = AnyChange end object cbShowToolbar: TCheckBox Left = 12 Top = 20 Width = 97 Height = 17 HelpContext = 201 Caption = 'Show t&oolbar' State = cbChecked TabOrder = 0 OnClick = AnyChange end object cbShowStatusBar: TCheckBox Left = 12 Top = 68 Width = 97 Height = 17 HelpContext = 203 Caption = 'Show status &bar' State = cbChecked TabOrder = 2 OnClick = AnyChange end object cbShowTrackBar: TCheckBox Left = 12 Top = 44 Width = 97 Height = 17 HelpContext = 202 Caption = 'Show t&rack bar' State = cbChecked TabOrder = 1 OnClick = AnyChange end object cbShowShortMenu: TCheckBox Left = 224 Top = 44 Width = 105 Height = 17 HelpContext = 205 Caption = 'Show Short &menu' TabOrder = 4 OnClick = AnyChange end end object GroupBox8: TGroupBox Left = 8 Top = 288 Width = 189 Height = 61 HelpContext = 206 Caption = 'Title bar tool tip display' TabOrder = 2 object cmbToolTipDisplay: TComboBox Left = 8 Top = 24 Width = 165 Height = 21 HelpContext = 206 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'None' 'Artist' 'Title' 'Track Name' 'Artist, Title' 'Artist, Title, Track Name' 'Artist, Track Name' 'Title, Track Name') TabOrder = 0 OnChange = cmbToolTipDisplayChange end end object GroupBox11: TGroupBox Left = 8 Top = 172 Width = 385 Height = 105 Caption = 'Skin' TabOrder = 1 object Label41: TLabel Left = 12 Top = 48 Width = 19 Height = 13 Caption = '&File:' FocusControl = edtSkinFileName end object btnSkinBrowse: TSpeedButton Left = 348 Top = 62 Width = 25 Height = 25 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 5555555555555555555555555555555555555555555555555555} NumGlyphs = 2 OnClick = btnSkinBrowseClick end object optSkinEnabled: TCheckBox Left = 12 Top = 20 Width = 69 Height = 17 HelpContext = 207 Caption = '&Enabled' State = cbChecked TabOrder = 0 OnClick = AnyChange end object optSkinStretch: TCheckBox Left = 88 Top = 20 Width = 61 Height = 17 HelpContext = 208 Caption = '&Stretch' TabOrder = 1 OnClick = AnyChange end object optSkinCenter: TCheckBox Left = 164 Top = 20 Width = 61 Height = 17 HelpContext = 209 Caption = '&Centre' TabOrder = 2 OnClick = AnyChange end object edtSkinFileName: TEdit Left = 12 Top = 64 Width = 333 Height = 21 HelpContext = 211 TabOrder = 3 OnChange = AnyChange end object optSkinTransparent: TCheckBox Left = 240 Top = 20 Width = 85 Height = 17 HelpContext = 210 Caption = 'Trans&parent' TabOrder = 4 OnClick = AnyChange end end end object tbsHotKeys: TTabSheet Tag = 3 Caption = '&Hot Keys' TabVisible = False object Image1: TImage Left = 16 Top = 16 Width = 32 Height = 32 AutoSize = True Picture.Data = {} Transparent = True end object Label7: TLabel Left = 60 Top = 20 Width = 277 Height = 33 AutoSize = False Caption = 'Select the hot keys you want to use to control the Remote Contro' + 'l CD Player.' WordWrap = True end object Label13: TLabel Left = 96 Top = 56 Width = 249 Height = 17 AutoSize = False Caption = 'Hot keys are disabled whilst this tab is selected.' WordWrap = True end object Label17: TLabel Left = 60 Top = 56 Width = 33 Height = 17 AutoSize = False Caption = 'Note:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False WordWrap = True end object GroupBox2: TGroupBox Left = 8 Top = 84 Width = 185 Height = 257 Caption = 'Playing Commands' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label1: TLabel Left = 44 Top = 24 Width = 23 Height = 13 Alignment = taRightJustify Caption = '&Play:' FocusControl = hkPlay end object Label2: TLabel Left = 36 Top = 58 Width = 33 Height = 13 Alignment = taRightJustify Caption = 'P&ause:' FocusControl = hkPause end object Label3: TLabel Left = 44 Top = 92 Width = 25 Height = 13 Alignment = taRightJustify Caption = '&Stop:' FocusControl = hkStop end object Label4: TLabel Left = 28 Top = 126 Width = 41 Height = 13 Alignment = taRightJustify Caption = '&Forward:' FocusControl = hkForward end object Label5: TLabel Left = 41 Top = 160 Width = 28 Height = 13 Alignment = taRightJustify Caption = '&Back:' FocusControl = hkBack end object Label14: TLabel Left = 4 Top = 194 Width = 65 Height = 13 Alignment = taRightJustify Caption = 'Skip F&orward:' FocusControl = hkSkipForward end object Label15: TLabel Left = 17 Top = 228 Width = 52 Height = 13 Alignment = taRightJustify Caption = 'Skip B&ack:' FocusControl = hkSkipBack end object hkPlay: THotKey Left = 72 Top = 20 Width = 103 Height = 19 HelpContext = 301 HotKey = 24656 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 0 OnEnter = AnyChange OnExit = AnyChange end object hkPause: THotKey Left = 72 Top = 54 Width = 103 Height = 19 HelpContext = 301 HotKey = 24656 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 1 OnEnter = AnyChange OnExit = AnyChange end object hkStop: THotKey Left = 72 Top = 88 Width = 103 Height = 19 HelpContext = 301 HotKey = 24659 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 2 OnEnter = AnyChange OnExit = AnyChange end object hkForward: THotKey Left = 72 Top = 122 Width = 103 Height = 19 HelpContext = 301 HotKey = 24646 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 3 OnEnter = AnyChange OnExit = AnyChange end object hkBack: THotKey Left = 72 Top = 156 Width = 103 Height = 19 HelpContext = 301 HotKey = 24642 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 4 OnEnter = AnyChange OnExit = AnyChange end object hkSkipForward: THotKey Left = 72 Top = 190 Width = 103 Height = 19 HelpContext = 301 HotKey = 24655 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 5 OnEnter = AnyChange OnExit = AnyChange end object hkSkipBack: THotKey Left = 72 Top = 224 Width = 103 Height = 19 HelpContext = 301 HotKey = 24641 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 6 OnEnter = AnyChange OnExit = AnyChange end end object GroupBox3: TGroupBox Left = 204 Top = 84 Width = 185 Height = 81 Caption = 'Transport Commands' TabOrder = 1 object Label6: TLabel Left = 16 Top = 24 Width = 27 Height = 13 Alignment = taRightJustify Caption = '&Eject:' FocusControl = hkEject end object Label9: TLabel Left = 14 Top = 56 Width = 29 Height = 13 Alignment = taRightJustify Caption = '&Close:' FocusControl = hkClose end object hkEject: THotKey Left = 48 Top = 20 Width = 103 Height = 19 HelpContext = 301 HotKey = 24645 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 0 OnEnter = AnyChange OnExit = AnyChange end object hkClose: THotKey Left = 48 Top = 52 Width = 103 Height = 19 HelpContext = 301 HotKey = 24643 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 1 OnEnter = AnyChange OnExit = AnyChange end end object GroupBox4: TGroupBox Left = 204 Top = 172 Width = 185 Height = 81 Caption = 'Hot Key Control' TabOrder = 2 object Label18: TLabel Left = 14 Top = 20 Width = 116 Height = 13 Alignment = taRightJustify Caption = '&Enable/Disable hot keys' FocusControl = hkToggle end object hkToggle: THotKey Left = 48 Top = 40 Width = 103 Height = 19 HelpContext = 302 HotKey = 24651 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 0 OnEnter = AnyChange OnExit = AnyChange end end object GroupBox10: TGroupBox Left = 204 Top = 258 Width = 185 Height = 81 Caption = 'CDDB' TabOrder = 3 object Label28: TLabel Left = 14 Top = 20 Width = 122 Height = 13 Alignment = taRightJustify Caption = 'Reload CDDB Information' FocusControl = hkCDDBReload end object hkCDDBReload: THotKey Left = 48 Top = 40 Width = 103 Height = 19 HelpContext = 303 HotKey = 24658 InvalidKeys = [hcNone, hcShift] Modifiers = [hkShift, hkCtrl] TabOrder = 0 OnEnter = AnyChange OnExit = AnyChange end end end object tbsAbout: TTabSheet Tag = 4 Caption = '&Register' TabVisible = False object Image6: TImage Left = 4 Top = 196 Width = 144 Height = 157 AutoSize = True Picture.Data = {} PopupMenu = PopupMenu end object Label10: TLabel Left = 154 Top = 200 Width = 241 Height = 53 AutoSize = False Caption = 'Graeme Chandler is a software developer specialising in Delphi. ' + 'He has worked for many years in the health industry in Australia' + ' and has been contracting since 1996.' WordWrap = True end object Label11: TLabel Left = 156 Top = 264 Width = 31 Height = 13 Caption = 'E-mail:' FocusControl = Edit1 end object Label12: TLabel Left = 156 Top = 308 Width = 67 Height = 13 Caption = 'Web Address:' FocusControl = Edit2 end object lblVersion: TLabel Left = 64 Top = 36 Width = 125 Height = 13 Caption = 'Remote Control CD V1.5.2' end object Image2: TImage Left = 8 Top = 8 Width = 48 Height = 48 AutoSize = True Picture.Data = {} Transparent = True end object gbLabelFX1: TgbLabelFX Left = 64 Top = 16 Width = 48 Height = 19 LabelStyle = lsRaised Caption = 'RCCD' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] end object Bevel1: TBevel Left = 8 Top = 176 Width = 381 Height = 5 Shape = bsTopLine Style = bsRaised end object Label20: TLabel Left = 10 Top = 76 Width = 99 Height = 17 AutoSize = False Caption = 'RCCD is Freeware!' WordWrap = True end object lblRegister: TLabel Left = 10 Top = 96 Width = 359 Height = 29 AutoSize = False Caption = 'Please register to support further development and to be advised' + ' of updates and patches.' WordWrap = True end object Label21: TLabel Left = 264 Top = 16 Width = 104 Height = 13 Caption = 'Copyright 1995-98' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label22: TLabel Left = 264 Top = 30 Width = 110 Height = 13 Caption = 'Graeme K Chandler' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Edit1: TEdit Left = 156 Top = 284 Width = 121 Height = 21 TabStop = False BorderStyle = bsNone Color = clBtnFace Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 0 Text = 'jag@access.net.au' end object Edit2: TEdit Left = 156 Top = 328 Width = 185 Height = 21 TabStop = False BorderStyle = bsNone Color = clBtnFace Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 1 Text = 'http://www.gajits.au.com' end object btnVisitSite: TButton Left = 4 Top = 136 Width = 120 Height = 25 Caption = '&Visit my Web Site' TabOrder = 2 OnClick = btnVisitSiteClick end object btnRegister: TButton Left = 260 Top = 136 Width = 120 Height = 25 Caption = '&Register' TabOrder = 3 OnClick = btnRegisterClick end object btnRegNo: TButton Left = 132 Top = 136 Width = 120 Height = 25 Caption = '&Enter Registration No.' TabOrder = 4 OnClick = btnRegNoClick end end object tbsCredits: TTabSheet Tag = 5 Caption = 'Credits' TabVisible = False object ScrollBox1: TScrollBox Left = 0 Top = 41 Width = 397 Height = 323 Align = alClient Ctl3D = True ParentCtl3D = False TabOrder = 0 object Label34: TLabel Left = 64 Top = 28 Width = 61 Height = 13 Caption = 'Ed Hatherley' end object Label35: TLabel Left = 52 Top = 12 Width = 55 Height = 13 Caption = 'Graphics:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label36: TLabel Left = 64 Top = 100 Width = 70 Height = 13 Caption = 'Rob Borthwick' end object Label37: TLabel Left = 52 Top = 64 Width = 184 Height = 13 Caption = 'Testing and design suggestions:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label38: TLabel Left = 64 Top = 116 Width = 61 Height = 13 Caption = 'Ed Hatherley' end object Label39: TLabel Left = 92 Top = 136 Width = 87 Height = 13 Caption = 'and many others...' end object Image5: TImage Left = 16 Top = 12 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Image8: TImage Left = 16 Top = 64 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Label40: TLabel Left = 64 Top = 84 Width = 56 Height = 13 Caption = 'John Aldred' end object Label24: TLabel Left = 12 Top = 236 Width = 357 Height = 41 AutoSize = False Caption = 'Thanks to Ti Kan and Steve Scherf at CDDB for providing a free s' + 'ervice for users of CD players to enable downloading of CD artis' + 't and track information:' WordWrap = True end object Label25: TLabel Left = 12 Top = 220 Width = 39 Height = 13 Caption = 'CDDB:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label29: TLabel Left = 152 Top = 84 Width = 68 Height = 13 Caption = 'Jamie Conway' end object Label30: TLabel Left = 152 Top = 100 Width = 62 Height = 13 Caption = 'Jason Bance' end object Image9: TImage Left = 16 Top = 171 Width = 26 Height = 26 AutoSize = True Picture.Data = {} end object Bevel2: TBevel Left = 14 Top = 169 Width = 31 Height = 30 Style = bsRaised end object Label31: TLabel Left = 52 Top = 168 Width = 193 Height = 13 Caption = 'For his Freeware TCP component:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label32: TLabel Left = 52 Top = 188 Width = 81 Height = 13 Caption = 'Fran�ois PIETTE' end object Edit9: TEdit Left = 196 Top = 24 Width = 165 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 0 Text = 'pegged@hurontel.on.ca' end object Edit4: TEdit Left = 196 Top = 268 Width = 165 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 1 Text = 'http://www.cddb.com' end object Edit5: TEdit Left = 196 Top = 184 Width = 165 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 2 Text = 'http://www.rtfm.be/fpiette' end end object Panel3: TPanel Left = 0 Top = 0 Width = 397 Height = 41 Align = alTop BevelOuter = bvNone TabOrder = 1 object Label33: TLabel Left = 12 Top = 8 Width = 348 Height = 19 Caption = 'Many thanks to the following for their contribution:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end end end object tbsCDDB: TTabSheet Tag = 6 Caption = 'tbsCDDB' TabVisible = False object Image7: TImage Left = 8 Top = 8 Width = 48 Height = 48 AutoSize = True Picture.Data = {} Transparent = True end object Label23: TLabel Left = 60 Top = 12 Width = 317 Height = 41 AutoSize = False Caption = 'CDDB is the CD Internet Database. Use these settings to control ' + 'how RCCD communicates with this database to download CD track in' + 'formation.' WordWrap = True end object Label26: TLabel Left = 8 Top = 76 Width = 95 Height = 13 Caption = 'Your e-mail address:' end object Label27: TLabel Left = 8 Top = 104 Width = 79 Height = 13 Caption = 'Selected Server:' end object edtEmail: TEdit Left = 108 Top = 72 Width = 213 Height = 21 HelpContext = 600 TabOrder = 0 OnChange = AnyChange end object edtServer: TEdit Left = 108 Top = 100 Width = 213 Height = 21 HelpContext = 601 Color = clBtnFace ReadOnly = True TabOrder = 1 Text = 'cddb.cddb.com' OnChange = AnyChange end object btnChange: TButton Left = 324 Top = 100 Width = 62 Height = 21 HelpContext = 602 Caption = '&Change' TabOrder = 2 OnClick = btnChangeClick end object grpCDDBDowload: TRadioGroup Left = 12 Top = 164 Width = 177 Height = 85 HelpContext = 604 Caption = 'Download from CDDB' ItemIndex = 1 Items.Strings = ( 'As required' 'Only when asked') TabOrder = 3 OnClick = AnyChange end object btnCDDBTest: TButton Left = 112 Top = 128 Width = 125 Height = 25 HelpContext = 603 Caption = 'Test Selected Server' TabOrder = 4 OnClick = btnCDDBTestClick end object edtPort: TEdit Left = 8 Top = 128 Width = 73 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 5 Visible = False OnChange = AnyChange end object GroupBox9: TGroupBox Left = 12 Top = 256 Width = 177 Height = 97 Caption = 'Notify me when' TabOrder = 6 object optCDDBNotifyFailConnect: TCheckBox Left = 8 Top = 20 Width = 157 Height = 17 HelpContext = 606 Caption = 'Connection fails' State = cbChecked TabOrder = 0 OnClick = AnyChange end object optCDDBDownloadComplete: TCheckBox Left = 8 Top = 68 Width = 149 Height = 17 HelpContext = 608 Caption = 'Download is complete' TabOrder = 2 OnClick = AnyChange end object optCDDBNotifyFailDownload: TCheckBox Left = 8 Top = 44 Width = 157 Height = 17 HelpContext = 607 Caption = 'Download fails' State = cbChecked TabOrder = 1 OnClick = AnyChange end end object grpOptions: TGroupBox Left = 208 Top = 164 Width = 177 Height = 49 Caption = 'Options' TabOrder = 7 object optDownloadStatus: TCheckBox Left = 12 Top = 20 Width = 145 Height = 17 HelpContext = 605 Caption = 'Show download status' State = cbChecked TabOrder = 0 end end end end object Panel1: TPanel Left = 0 Top = 395 Width = 582 Height = 27 Align = alBottom BevelOuter = bvNone TabOrder = 2 object Panel2: TPanel Left = 339 Top = 0 Width = 243 Height = 27 Align = alRight BevelOuter = bvNone Caption = 'Panel2' TabOrder = 0 object btnOK: TButton Left = 4 Top = 2 Width = 75 Height = 25 Caption = '&OK' Default = True TabOrder = 0 OnClick = btnOKClick end object btnCancel: TButton Left = 84 Top = 2 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 1 OnClick = btnCancelClick end object btnApply: TButton Left = 164 Top = 2 Width = 75 Height = 25 Caption = '&Apply' TabOrder = 2 OnClick = btnApplyClick end end end object Panel9: TPanel Left = 0 Top = 0 Width = 582 Height = 21 Align = alTop BevelOuter = bvNone TabOrder = 3 end object Panel8: TPanel Left = 0 Top = 21 Width = 177 Height = 374 Align = alLeft BevelOuter = bvNone TabOrder = 0 object tvCategory: TTreeView Left = 7 Top = 1 Width = 165 Height = 371 ReadOnly = True RightClickSelect = True HideSelection = False Indent = 19 Items.Data = { 0300000027000000000000000000000001000000FFFFFFFF0000000002000000 0E52434344204265686176696F757223000000000000000000000002000000FF FFFFFF00000000000000000A417070656172616E636521000000000000000000 000003000000FFFFFFFF000000000000000008486F74204B6579731D00000000 0000000000000006000000FFFFFFFF0000000000000000044344444221000000 000000000000000004000000FFFFFFFF00000000010000000852656769737465 7220000000000000000000000005000000FFFFFFFF0000000000000000074372 6564697473} OnChange = tvCategoryChange TabOrder = 0 end end object PopupMenu: TPopupMenu Left = 460 Top = 4 object mnuShowSplashScreen: TMenuItem Caption = '&Show Splash Screen' Checked = True OnClick = mnuShowSplashScreenClick end end object OpenPictureDialog: TOpenPictureDialog Filter = 'All (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.bmp;*.' + 'ico;*.emf;*.wmf|JPEG Image File (*.jpg)|*.jpg|JPEG Image File (*' + '.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced' + ' Metafiles (*.emf)|*.emf|Metafiles (*.wmf)|*.wmf' Left = 425 Top = 339 end end